#include<bits/stdc++.h>
#define ll long long
#define mid ((l+r)>>1)
using namespace std;
namespace IO{
    char buff[1<<21],*p1=buff,*p2=buff;
    char getch(){
        return p1==p2&&(p2=((p1=buff)+fread(buff,1,1<<21,stdin)),p1==p2)?EOF:*p1++;
    }
    template<typename T>
    void read(T &x){
        char ch=getch();int fl=1;x=0;
        while(ch>'9'||ch<'0'){if(ch=='-')fl=-1;ch=getch();}
        while(ch<='9'&&ch>='0'){x=x*10+ch-48;ch=getch();}
        x*=fl;
    }
    template<typename T,typename ...Args>
    void read(T &x,Args& ...args){
        read(x);read(args...);
    }
    char obuf[1<<21],*p3=obuf;
    void putch(char ch){
        if(p3-obuf<(1<<21))*p3++=ch;
        else fwrite(obuf,p3-obuf,1,stdout),p3=obuf,*p3++=ch;
    }
    void pc(const char *s){
    	while(*s)putch(*s),s++;
    }
    char ch[100];
    template<typename T>
    void write(T x){
        if(!x)return putch('0');
        if(x<0)putch('-'),x*=-1;
        int top=0;
        while(x)ch[++top]=x%10+48,x/=10;
        while(top)putch(ch[top]),top--;
    }
    template<typename T,typename ...Args>
    void write(T x,Args ...args){
        write(x),putch(' '),write(args...);
    }
    void flush(){fwrite(obuf,p3-obuf,1,stdout);}
}
using namespace IO;
const int N=1005,mod=1e9+7;
inline int Mod(int x){return x>=mod?x-mod:x;}
inline void add(int &x,int y){return x=Mod(x+y),void();}
int n,m,ans;
bool p[N],a[N],b[N];
int P[N];
void INPUT(){
	read(n,m);
	for(int i=P[0]=1;i<=n;i++)
		P[i]=Mod(P[i-1]+P[i-1]);
	for(int i=n-2;i>=0;i--){
		char ch=getch();
		while(ch!='L'&&ch!='R')ch=getch();
		p[i]=(ch=='R');
	}
	int sa=0;
	for(int i=n-1;i>=0;i--){
		char ch=getch();
		while(ch!='0'&&ch!='1')ch=getch();
		a[i]=(ch=='1');
		add(sa,a[i]*P[i]);
	}
	int sb=0;
	for(int i=n-1;i>=0;i--){
		char ch=getch();
		while(ch!='0'&&ch!='1')ch=getch();
		b[i]=(ch=='1');
		add(sb,b[i]*P[i]);
	}
	bool flag=1;
	for(int i=0;i<n;i++)
		if(a[i]!=b[i])
			flag=0;
	if(flag){
		write(sa);
		flush();
		exit(0);
	}
	ans=Mod(sa+sb);
}
int f[N][N][2],g[N][N][2];
void sol1(){
	bool flag=1;
	int D=P[n-1],U=P[n-1];
	bool o1=0,o2=0;
	int cnt1=0,cnt2=0;
	for(int i=n-2;i>=1;i--){
		if(!flag){
			if(a[i]==0){
				if((o1^p[i])==a[i]){
					if(m-cnt1-1>=0)add(ans,Mod(1ll*f[i-1][m-cnt1-1][o1^1]*Mod(D+P[i])%mod+g[i-1][m-cnt1-1][o1^1]));
				}else{ 
					if(m-cnt1>=0)add(ans,Mod(1ll*f[i-1][m-cnt1][o1]*Mod(D+P[i])%mod+g[i-1][m-cnt1][o1]));
				}
			}
			if(b[i]==1){
				if((o2^p[i])==b[i]){
					if(m-cnt2-1>=0)add(ans,Mod(1ll*f[i-1][m-cnt2-1][o2^1]*U%mod+g[i-1][m-cnt2-1][o2^1]));
				}else{
					if(m-cnt2>=0)add(ans,Mod(1ll*f[i-1][m-cnt2][o2]*U%mod+g[i-1][m-cnt2][o2]));
				}
			}
		}
		if(a[i]!=b[i])flag=0;
		if((o1^p[i])!=a[i]){
			o1^=1;
			cnt1++;
		}add(D,a[i]*P[i]);
		if((o2^p[i])!=b[i]){
			o2^=1;
			cnt2++;
		}add(U,b[i]*P[i]);
	}
	if(a[0]==0&&(o1^p[0])==a[0]&&cnt1+1==m)
		add(ans,Mod(D+1));
	if(b[0]==1&&(o2^p[0])==b[0]&&cnt2+1==m)
		add(ans,U);
}
void sol2(){
	bool flag=1;
	int D=P[n-1],U=P[n-1];
	bool o1=1,o2=1;
	int cnt1=0,cnt2=0;
	for(int i=n-2;i>=1;i--){
		if(!flag){
			if(a[i]==0){
				if((o1^p[i])==a[i]){
					if(m-cnt1-1>=0)add(ans,Mod(1ll*f[i-1][m-cnt1-1][o1^1]*Mod(D+P[i])%mod+g[i-1][m-cnt1-1][o1^1]));
				}else{ 
					if(m-cnt1>=0)add(ans,Mod(1ll*f[i-1][m-cnt1][o1]*Mod(D+P[i])%mod+g[i-1][m-cnt1][o1]));
				}
			}
			if(b[i]==1){
				if((o2^p[i])==b[i]){
					if(m-cnt2-1>=0)add(ans,Mod(1ll*f[i-1][m-cnt2-1][o2^1]*U%mod+g[i-1][m-cnt2-1][o2^1]));
				}else{
					if(m-cnt2>=0)add(ans,Mod(1ll*f[i-1][m-cnt2][o2]*U%mod+g[i-1][m-cnt2][o2]));
				}
			}
		}
		if(a[i]!=b[i])flag=0;
		if((o1^p[i])!=a[i]){
			o1^=1;
			cnt1++;
		}add(D,a[i]*P[i]);
		if((o2^p[i])!=b[i]){
			o2^=1;
			cnt2++;
		}add(U,b[i]*P[i]);
	}
	if(a[0]==0&&(o1^p[0])==a[0]&&cnt1+1==m)
		add(ans,Mod(D+1));
	if(b[0]==1&&(o2^p[0])==b[0]&&cnt2+1==m)
		add(ans,U);
}
signed main(){
	freopen("lost.in","r",stdin);
	freopen("lost.out","w",stdout);
	INPUT();
	f[0][0][0]=1;
	g[0][0][0]=p[0];
	f[0][0][1]=1;
	g[0][0][1]=1-p[0];
	f[0][1][0]=1;
	g[0][1][0]=1-p[0];
	f[0][1][1]=1;
	g[0][1][1]=p[0];
	for(int i=1;i<=n-2;i++){
		for(int j=0;j<=i+1;j++){
			for(int k=0;k<2;k++){
				f[i][j][k]=f[i-1][j][k];
				g[i][j][k]=Mod(g[i-1][j][k]+1ll*(p[i]^k)*P[i]*f[i-1][j][k]%mod);
				if(j){
					add(f[i][j][k],f[i-1][j-1][k^1]);
					add(g[i][j][k],Mod(g[i-1][j-1][k^1]+1ll*(p[i]^k^1)*P[i]*f[i-1][j-1][k^1]%mod));
				}
			}
		}
	}
	sol1();
	sol2();
	write(ans);
	return flush(),0;
}

